---------------------------------------------------------------------------------------------------------------------------------------
      name:  <unnamed>
       log:  /Users/ngkalaf/Dropbox/infographics/Infographic_Survey/Replication Files/infographicdata_replication_log.log
  log type:  text
 opened on:  30 Sep 2022, 14:26:53

. 
. 
. *********************************
. *** Load Data
. *********************************
. 
. use "infographicdata_replication.dta"

. 
. 
. *********************************
. *** Codebook View in Stata
. *********************************
. codebook

---------------------------------------------------------------------------------------------------------------------------------------
criticalthink                                                                                Infographics improve my critical thinking.
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  atod_rev

                 range:  [1,5]                        units:  1
         unique values:  5                        missing .:  0/83

            tabulation:  Freq.   Numeric  Label
                             1         1  Strongly Disagree
                             9         2  Disagree
                            26         3  Neither agree nor disagree
                            36         4  Agree
                            11         5  Strongly Agree

---------------------------------------------------------------------------------------------------------------------------------------
learninfo                                                                                   Infographics help me learn new information.
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  atod_rev

                 range:  [1,5]                        units:  1
         unique values:  5                        missing .:  0/83

            tabulation:  Freq.   Numeric  Label
                             1         1  Strongly Disagree
                             3         2  Disagree
                            19         3  Neither agree nor disagree
                            39         4  Agree
                            21         5  Strongly Agree

---------------------------------------------------------------------------------------------------------------------------------------
presentskills                                                                              Infographics improve my presentation skills.
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  atod_rev

                 range:  [1,5]                        units:  1
         unique values:  5                        missing .:  0/83

            tabulation:  Freq.   Numeric  Label
                             3         1  Strongly Disagree
                             4         2  Disagree
                            19         3  Neither agree nor disagree
                            34         4  Agree
                            23         5  Strongly Agree

---------------------------------------------------------------------------------------------------------------------------------------
confidence                                                                       Infographics give me more self-confidence re: learning
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  atod_rev

                 range:  [1,5]                        units:  1
         unique values:  5                        missing .:  0/83

            tabulation:  Freq.   Numeric  Label
                             2         1  Strongly Disagree
                            11         2  Disagree
                            29         3  Neither agree nor disagree
                            28         4  Agree
                            13         5  Strongly Agree

---------------------------------------------------------------------------------------------------------------------------------------
understandscholarly                                                    Creating infographics helped me understand scholarly literature.
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  atod_rev

                 range:  [2,5]                        units:  1
         unique values:  4                        missing .:  48/83

            tabulation:  Freq.   Numeric  Label
                             2         2  Disagree
                            10         3  Neither agree nor disagree
                            12         4  Agree
                            11         5  Strongly Agree
                            48         .  

---------------------------------------------------------------------------------------------------------------------------------------
used                                                          I used my classmates' infographics to help me apply scholarly literature.
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  atod_rev

                 range:  [1,5]                        units:  1
         unique values:  5                        missing .:  48/83

            tabulation:  Freq.   Numeric  Label
                             3         1  Strongly Disagree
                             4         2  Disagree
                             7         3  Neither agree nor disagree
                            11         4  Agree
                            10         5  Strongly Agree
                            48         .  

---------------------------------------------------------------------------------------------------------------------------------------
easyread                                               It is easier to read a classmates' infographic than to read a scholarly article.
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  atod_rev

                 range:  [1,5]                        units:  1
         unique values:  5                        missing .:  48/83

            tabulation:  Freq.   Numeric  Label
                             1         1  Strongly Disagree
                             1         2  Disagree
                             5         3  Neither agree nor disagree
                             6         4  Agree
                            22         5  Strongly Agree
                            48         .  

---------------------------------------------------------------------------------------------------------------------------------------
trust                                                        I trust my classmates' infographics to be reliable sources of information.
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  atod_rev

                 range:  [1,5]                        units:  1
         unique values:  5                        missing .:  48/83

            tabulation:  Freq.   Numeric  Label
                             1         1  Strongly Disagree
                             2         2  Disagree
                             9         3  Neither agree nor disagree
                            16         4  Agree
                             7         5  Strongly Agree
                            48         .  

---------------------------------------------------------------------------------------------------------------------------------------
posttest                                                                                                                      Post Test
---------------------------------------------------------------------------------------------------------------------------------------

                  type:  numeric (float)
                 label:  posttest

                 range:  [0,1]                        units:  1
         unique values:  2                        missing .:  0/83

            tabulation:  Freq.   Numeric  Label
                            48         0  Pre-Test
                            35         1  Post-Test

. 
. *********************************
. *** Create figure 2
. *********************************
. 
. *create box plots of variables of interest
. 
. graph box understandscholarly-trust , ///
>         title("Student Perceptions of Infographics as a Tool") legend(position(6))

. 
. 
. *********************************
. *** Create figure 1 
. *********************************
. 
. *save data to use for each figure
. save tokendata, replace 
(note: file tokendata.dta not found)
file tokendata.dta saved

. 
. *use statsby to plot means by pre-/post-test with confidence intervals
. statsby , by(posttest) : ci means criticalthink, level(90)
(running ci on estimation sample)

      command:  ci means criticalthink
            N:  r(N)
         mean:  r(mean)
           se:  r(se)
           lb:  r(lb)
           ub:  r(ub)
        level:  r(level)
           by:  posttest

Statsby groups
----+--- 1 ---+--- 2 ---+--- 3 ---+--- 4 ---+--- 5 
..

. gen which = "Critical Thinking" 

. save ciresults, replace 
(note: file ciresults.dta not found)
file ciresults.dta saved

. 
. u tokendata 

. statsby , by(posttest) : ci means learninfo, level(90)
(running ci on estimation sample)

      command:  ci means learninfo
            N:  r(N)
         mean:  r(mean)
           se:  r(se)
           lb:  r(lb)
           ub:  r(ub)
        level:  r(level)
           by:  posttest

Statsby groups
----+--- 1 ---+--- 2 ---+--- 3 ---+--- 4 ---+--- 5 
..

. gen which = "Learn New Information" 

. save ciresults2, replace 
(note: file ciresults2.dta not found)
file ciresults2.dta saved

. 
. u tokendata 

. statsby , by(posttest) : ci means confidence, level(90)
(running ci on estimation sample)

      command:  ci means confidence
            N:  r(N)
         mean:  r(mean)
           se:  r(se)
           lb:  r(lb)
           ub:  r(ub)
        level:  r(level)
           by:  posttest

Statsby groups
----+--- 1 ---+--- 2 ---+--- 3 ---+--- 4 ---+--- 5 
..

. gen which = "Self-Confidence in Learning" 

. save ciresults3, replace 
(note: file ciresults3.dta not found)
file ciresults3.dta saved

. 
. u tokendata 

. statsby , by(posttest) : ci means presentskills, level(90)
(running ci on estimation sample)

      command:  ci means presentskills
            N:  r(N)
         mean:  r(mean)
           se:  r(se)
           lb:  r(lb)
           ub:  r(ub)
        level:  r(level)
           by:  posttest

Statsby groups
----+--- 1 ---+--- 2 ---+--- 3 ---+--- 4 ---+--- 5 
..

. gen which = "Presentation Skills" 

. append using ciresults
(label posttest already defined)

. append using ciresults2 
(note: variable which was str19, now str21 to accommodate using data's values)
(label posttest already defined)

. append using ciresults3
(note: variable which was str21, now str27 to accommodate using data's values)
(label posttest already defined)

.  
. *encode which
. encode which, gen(Which) 

. 
. *list numeric means in figure
. gen toshow = string(mean, "%3.2f") 

. gen yshow = 4.6 

. 
. *create figure
. set scheme white_tableau

. twoway scatter mean posttest, xsc(r(-0.2 1.2)) yla(, ang(h)) ///
> || scatter yshow posttest, ms(none) mlabpos(0) mlabsize(medium) mla(toshow) ///
> || rcap ub lb posttest , by(which, note("") legend(off) title("Differences in Perceived Learning with Infographic Assignment")) xla(0
>  "Pre-Test" 1 "Post-Test") xtitle("") 

. 
. 
. *********************************
. *** End Log
. *********************************
. log close
      name:  <unnamed>
       log:  /Users/ngkalaf/Dropbox/infographics/Infographic_Survey/Replication Files/infographicdata_replication_log.log
  log type:  text
 closed on:  30 Sep 2022, 14:27:00
---------------------------------------------------------------------------------------------------------------------------------------
